Top 10k strings from Start to Program (1984)(St. Michael)(Tape 2 of 2 Side A).tzx in <root> / bin / z80 / software / Sinclair Spectrum Collection TOSEC.exe / Sinclair ZX Spectrum - Utilities & Educational / Sinclair ZX Spectrum - Utilities & Educational - [TZX] (TOSEC-v2007-01-01) /

Back to the directory listing

   5 make a guess           
   5 This is the last line  that BASIC will allow
   5 Rule1: leave well alone
   3 next input
   3 introduction           
   3 Go to BASIC:         press 
   2 wrong guess            
   2 w$="LOAD  ANOTHER"
   2 score a right answer   
   2 only certain keys allowed
   2 no of notes
   2 length,pitch
   2 input move
   2 input a move           
   2 graphics chars         
   2 get eaten by ghost     
   2 draw house             
   2 draw ghost
   2 cheery tune
   2 Score=Score-10
   2 OOOOOOOOOOOOOOOOOO
   2 Ghostroom=Ghostroom-1
   2 Ghostroom=Ghostroom+1
   2  is on the 
   2  ""name"" 
   1 z$           
   1 x(Guess),y(Guess);"
   1 x(Guess)+1
   1 write your own ...     
   1 will be lost."''"Just  type (be sure to type  theright number):"''
   1 where in room?         
   1 wait for key
   1 w$="SAVE YOUR OWN"
   1 w$="LOAD YOUR OWN"
   1 user defined graphics for roof
   1 udg of man
   1 the upstairs windows
   1 the skyline and grass
   1 the program ...        
   1 the musician           
   1 the downstairs windows
   1 the chimneys
   1 the brickwork
   1 suggestions - just type
   1 stop multiple key hits
   1 stay alive
   1 special case Guess=0
   1 somewhere"
   1 sinister tune          
   1 show score
   1 set variables for prog 
   1 set up charms for game 
   1 screen    
   1 run into mouth         
   1 run       
   1 random tips
   1 r$(i),w$(1
   1 put charm in a room
   1 print score and best   
   1 press enter to move on 
   1 only if in Ghostroom
   1 only arrow keys and enter allowed
   1 on line 160, or mixed up
   1 new game or stop?      
   1 needs an appropriate    
   1 n=Ghostroom
   1 n;" ";c$(i)':
   1 move ghostif moving out of ghostroom
   1 move ghost?            
   1 make guess
   1 introductn
   1 helpcharm?
   1 help.code 
   1 ghosthunt 
   1 ghost's mouth
   1 ghost's eyes
   1 f$="next":
   1 enter, so have guessed
   1 edit4     
   1 edit3     
   1 edit2     
   1 edit1     .
   1 eaten by ghost
   1 drop a charm           
   1 draw the ghoul         
   1 draw man in window     
   1 draw man in doorway    
   1 draw house
   1 draw him anywhere      
   1 draw a block of colour 
   1 deal with new charms   
   1 clear to b & w colours 
   1 clear message area     
   1 cheerful tune          
   1 charm type
   1 can't move up from upstairs
   1 can't move right from here
   1 can't move left from here
   1 can't move down from here
   1 c(j)=Guess
   1 c(i)=Guess
   1 because already got it
   1 assess charms in hand  
   1 and variable values"
   1 and countthe 
   1 a(v)+v)-47
   1 a(Ghostroom)
   1 `xxxXXXhhhPPP
   1 `xxxXXXhhh
   1 XXXhhhPPPpppHHH```xxxXXXhhhPPPppGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGG
   1 To go to the next:   press 
   1 To choose this one:  press 
   1 See Appendix B of your Spectrum manual for further details aboutthe report codes.
   1 Score>Best
   1 OOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOO
   1 More about the game: press 
   1 If you need any help or
   1 INTRODUCTION TO GHOSTHUNT Page ";pn 
   1 HINT: start again or leave my   private bits alone!
   1 HINT: look at lines 
   1 HELP for GHOSTHUNT
   1 Guess=Guess-4
   1 Guess=Guess-1
   1 Guess=Guess+4
   1 Guess=Guess+1
   1 Guess=Ghostroom
   1 Go to next page:     press 
   1 Go to ";f$;" page:     press 
   1 Ghostroom=Ghostroom-4
   1 Ghostroom=Ghostroom+4
   1 Ghostroom=8
   1 Ghostroom=5
   1 Ghostroom=1
   1 GHOSTHUNT";
   1 GHOSTHUNT + edit 4     
   1 GHOSTHUNT + edit 3     
   1 GHOSTHUNT + edit 2     
   1 GHOSTHUNT + edit 1     
   1 GGGGGGGGGGGGGGGGGGGGGGGGGGGG
   1 Created with Ramsoft MakeTZX
   1 Best=Score
   1 ABOUT THE GAME            Page ";pn
   1 =n-4n)=n-4
   1 ;r$(Guess);
   1 ;n$;", then enter y for YES"''"or n for NO."
   1 ;"you can program yourself
   1 ;"we'll go to the:"
   1 ;"use arrow keys to move"
   1 ;"use arrow keys to move or"
   1 ;"type your name here: ";n$
   1 ;"then start the tape.":
   1 ;"the adventure game";
   1 ;"suggestion";
   1 ;"save  your program";
   1 ;"room ";Guess
   1 ;"press enter to guess now.";:
   1 ;"press enter to guess now.";
   1 ;"load another level";
   1 ;"instructions";
   1 ;"don't forget CAPS SHIFT":
   1 ;"about the game"
   1 ;"Your score this time is ";
   1 ;"You are now in"'"the ";r$(Guess)
   1 ;"Yes, in the ";r$(Guess)'"But is the ghost"'"1 ";w$(1
   1 ;"Which room do you think"'"the ghost is in?"''"Press a key from 1 to 8."      
   1 ;"When you are ready, ";
   1 ;"What is your name?"
   1 ;"There is a ";c$(j)'"here in the ";r$(Guess)''"Do you want to pick it up?"'"Press y or n"
   1 ;"The ghost is not in"'"the ";r$(Guess)
   1 ;"The ghost is not in room ";Guess
   1 ;"The GHOST was in ";
   1 ;"STOP THE TAPE   Then press 
   1 ;"Right, ";w$(n,Guess)
   1 ;"Press the number to drop:"'
   1 ;"Press ENTER to move on";z$
   1 ;"Press ENTER to carry on";z$
   1 ;"Oh dear, ";n$;
   1 ;"Now, press enter.";z$
   1 ;"No, it's ";w$(Object,Guess)'"You lose 10 points.":
   1 ;"If you want another game of"
   1 ;"I feel the ghostly presence"'"I sense that it is close"'"to the ";r$(n)
   1 ;"Hello, ";n$;"."
   1 ;"GHOSTHUNT";
   1 ;"GHOSTHUNT"
   1 ;"But never mind.At least"'"you're still alive!":
   1 ;" or"'"press space to drop a charm"
   1 ;" an adventure game "
   1 ;" HAUNTED HOUSE "
   1 ;" GHOSTHUNT "
   1 ;" ";w$(Object,Guess)
   1 ;"    WELL DONE    ";
   1 ;"                           ":
   1 500        
   1 4400 onwards
   1 4000 onwards
   1 3030         
   1 3000 onwards
   1 300 to 400.
   1 1400 onwards
   1 ... and the subroutines
   1 ... adventure game.    
   1 ,y(Guess);"
   1 ,Guess)''"press 1 or 2"
   1 ,Guess)'"2 ";w$(2
   1 ,  you  canthen  start the game  by  typing           
   1 *K\"U\+"]\>
   1 )to edit the offending line!"
   1 )           
   1 (If  you  press 
   1 (Ghostroom=4
   1 (Ghostroom=1
   1 '''"Press 
   1 ''"To  use  the HELP  facility  youtype:"''
   1 ''"The unique HELP facility can:"'''"  1) describe the game."'''"  2) suggest  changes you  could     try out in GHOSTHUNT"
   1 ''"  3) show  you how to SAVE  your     own versions of the game."'''"  4) show  you  how to LOAD  the     next version of GHOSTHUNT."
   1 '"you got spooked by the ghost!"
   1 '"You lose 10 points":
   1 '"You can play GHOSTHUNT simply asan adventure game,  or else as afun    way   to   learn    BASICprogramming."''"If you find any part of the gameboring, it's up to you to changeit!" 
   1 '"When you leave the HELP program,you can  review  the  listing ofGHOSTHUNT by  making use  of the
   1 '"To use the next version, we mustMERGE in the changes.  Note that
   1 '"To load a version that you savedyourself  (suppose  the  programwas called ""mine"" when you savedit), Just type:"''
   1 '"The  aim of GHOSTHUNT is to finda ghost in a haunted  house.  Totrap  it,  you must discover theroom in which the ghost is to befound.  The  game has 5 ""levels""which  you  must add,  one at  atime. These are:"''"1) Simply guess the room number."
   1 '"TO  USE THIS PROGRAM,  YOU  MUSTREAD THIS INTRODUCTION CAREFULLY"''"GHOSTHUNT is a game program witha difference."''"You  develop the game  yourself,making  changes  to the  programlisting at will,  and there's  aunique added feature to give youhelp if you should ever need it."
   1 '"In the final version of the gamethere  are four charms -  a goldnugget,   a  silver   penny,   ashamrock and a locket.  Each onehas one of four  effects.  Theseeffects either:"
   1 '"If  the  going gets  too  tough,then you can always start afreshby  clearing  the  computer  andloading GHOSTHUNT from the  tapeagain."
   1 '"Choose  a  name for the  program(such  as your  own  name).  Thename   can  be  as  many  as  10characters long."''"Then,  using  the  chosen  name,type:"
   1 '"After  saving,  you may like  tocheck that it saved correctly."''"Rewind the tape and,  using  thesame name, type:"''
   1 '"2) You  can  move from  room  to   room, searching as you go."''"3) The ghost moves about too."''"4) Room  names and hiding places   are added."''"5) Magic charms can be found."
   1 '"  1) attract the ghost."''"  2) frighten the ghost away."''"  3) provide  a hint  where  the     ghost can be found."''"  4) give  a  hint  intended  to     confuse you."''"The problem is to discover whichis which?"
   1 "lounge","under the settee","in the grand piano","dining room","under the table","in the vase"
   1 "landing","in the bookcase","on the chandelier","magenta room","in the wardrobe","under the bed"
   1 "help.code"
   1 "gold nugget","shamrock","locket","silver penny"
   1 "ghosthunt"
   1 "conservatory","in the aspidistra","behind the azalea","kitchen","in the oven","in the larder"
   1 "black bedroom","in the wardrobe","under the bed","study","in the cupboard","under the desk"
   1 "You must be trying to
   1 "You may sometimes lose HELP, butit will reappear  after you next
   1 "You have probably lost a
   1 "You have made the program too   big. Delete some."
   1 "What on earth have you done?"'"You're on your own with this one"
   1 "Try to redefine the keys which  make the man move."'"For example, u could mean up, d down, l left and r right.":
   1 "Try to change when and where theghost moves. For example make itmove to a room at random.":
   1 "Try to change the names of the  rooms and the objects in them.":
   1 "Try to change the effects charmshave when they have been picked up.   You may find this quite a challenge!":
   1 "Is this a new variable?"
   1 "Have you lost 
   1 "Have you forgotten a
   1 "GHOSTHUNT"            
   1 "Check the variable values in thefunction"
   1 "Check the variable value"
   1 "Check the number or variable"'"value specifying the colour."
   1 "Check the last 
   1 "Change the tunes by altering thedata for the ""tune subroutines"".";:
   1 "Are you using 
   1 "Are you unlucky or are you a bitof a smart alec?";
   1 "Are you dividing by zero?"
   1 "0 no charm, after all."
   1 "''"using name of the next edit file"''
   1 "''"then start the tape."'''"
   1 "'"outside the screen"
   1 """name"" 
   1 """edit";v;""" 
   1  the GHOSTHUNT game."
   1  key."''"YOU CAN'T GO WRONG! 
   1  key.  Press  thekeys for 
   1  key.  Make sureyou  have a  blank  tape  in therecorder on which  to save  yourprogram."
   1  is on the J key."
   1  in extended mode(see  chapter 1 of  your  manualabout keymodes)."
   1  command on the 
   1  all bright lines in the listing
   1  SOMETHING YOU COULD CHANGE 
   1  HOW TO ";w$;" VERSION OF"'
   1  ""mine"" 
   1   to see your programor press CAPS SHIFT 1  (ie 
   1   separately,and then press the 
   1   is on T in extended  mode(see  chapter 1 of  your  Manualabout key modes)."''"A full version of the program ison side two of this tape.";
   1   If changesyou  make  to the  program  evercause  errors,  the HELP programwill automatically show you whatwent wrong and why."
   1    statement earlier in the program"